object OptionsForm: TOptionsForm Left = 409 Top = 271 BorderStyle = bsDialog BorderWidth = 5 Caption = 'OptionsForm' ClientHeight = 277 ClientWidth = 400 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Shell Dlg' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter PixelsPerInch = 96 TextHeight = 13 object btnOk: TButton Left = 124 Top = 246 Width = 75 Height = 25 Caption = '&OK' ModalResult = 1 TabOrder = 0 OnClick = btnOkClick end object btnCancel: TButton Left = 212 Top = 246 Width = 75 Height = 25 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 1 end object PageControl: TPageControl Left = 0 Top = 0 Width = 400 Height = 233 ActivePage = tsGeneral Align = alTop TabOrder = 2 object tsGeneral: TTabSheet Caption = 'General' object rgRateDispMode: TRadioGroup Left = 9 Top = 13 Width = 164 Height = 57 Caption = 'Display transfer rate as' Columns = 2 Items.Strings = ( 'Bytes/sec' 'Bit/sec') TabOrder = 0 end object gbPassword: TGroupBox Left = 10 Top = 75 Width = 164 Height = 121 Caption = 'Service access password' TabOrder = 1 object lePass1: TLabeledEdit Left = 14 Top = 42 Width = 131 Height = 21 EditLabel.Width = 73 EditLabel.Height = 13 EditLabel.Caption = 'Enter password' PasswordChar = '*' TabOrder = 0 end object lePass2: TLabeledEdit Left = 14 Top = 86 Width = 131 Height = 21 EditLabel.Width = 83 EditLabel.Height = 13 EditLabel.Caption = 'Confirm password' PasswordChar = '*' TabOrder = 1 end end object rgRuleClick: TRadioGroup Left = 185 Top = 13 Width = 196 Height = 57 Caption = 'Double click a rule opens' Columns = 2 Items.Strings = ( 'Statistics' 'Properties') TabOrder = 2 end end object TabSheet1: TTabSheet Caption = 'Advanced' ImageIndex = 1 object GroupBox1: TGroupBox Left = 9 Top = 13 Width = 371 Height = 85 Caption = 'Queueing' TabOrder = 0 object cbAckNoDelay: TCheckBox Left = 16 Top = 55 Width = 297 Height = 17 Caption = 'Transmit short TCP ACK frames with no queue' TabOrder = 0 end object leQueueSize: TLabeledEdit Left = 120 Top = 24 Width = 49 Height = 21 EditLabel.Width = 98 EditLabel.Height = 13 EditLabel.Caption = 'Maximum queue size' LabelPosition = lpLeft LabelSpacing = 10 TabOrder = 1 Text = '10' end object udQueueSize: TUpDown Left = 169 Top = 24 Width = 15 Height = 21 Associate = leQueueSize Min = 10 Max = 32767 Position = 10 TabOrder = 2 end end end end end